home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_4 / issue_10 / riscos < prev   
ArcFS Archive  |  1995-06-24  |  9.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: riscos

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 20 01 00 00 54 03 00 00 |Archive.| ...T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 55 6c 74 69 6d 61 | 74 65 00 00 ff ff ff ff |.!Ultima|te......|
|00000070| 46 fd ff ff 19 3b fc 1e | 00 00 00 00 ff ff ff ff |F....;..|........|
|00000080| fc 00 00 80 82 21 42 6f | 6f 74 00 00 ce 00 00 00 |.....!Bo|ot......|
|00000090| 36 00 00 00 43 eb ff ff | 90 89 c0 07 03 00 67 4f |6...C...|......gO|
|000000a0| 36 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |6...$...|.!Run...|
|000000b0| ce 00 00 00 89 00 00 00 | 43 eb ff ff 58 a5 c0 07 |........|C...X...|
|000000c0| 03 00 07 ce 89 00 00 00 | 7e 00 00 00 82 21 52 75 |........|~....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 00 | be 0e 00 00 43 fb ff ff |nImage..|....C...|
|000000e0| c1 4b a2 28 03 00 ce a9 | be 0e 00 00 2b 01 00 00 |.K.(....|....+...|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 e0 02 00 00 |.!Sprite|s.......|
|00000100| 43 f9 ff ff 9c 60 c0 07 | 03 00 2f 25 e0 02 00 00 |C....`..|../%....|
|00000110| 0d 10 00 00 82 57 69 6d | 70 4c 69 62 00 00 00 00 |.....Wim|pLib....|
|00000120| 0a 0e 00 00 43 fb ff ff | 6f 9b a9 27 03 00 3d db |....C...|o..'..=.|
|00000130| 0a 0e 00 00 11 13 00 00 | 00 00 3a 24 00 00 04 00 |........|..:$....|
|00000140| ce 00 00 00 00 00 00 00 | 21 00 1d 07 49 6e 66 6f |........|!...Info|
|00000150| 00 22 53 49 00 00 00 00 | 7a fd ff ff 00 00 00 00 |."SI....|z.......|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f |....File|Data.!Bo|
|00000360| 6f 74 00 00 ce 00 00 00 | 36 00 00 00 43 eb ff ff |ot......|6...C...|
|00000370| 90 89 c0 07 03 00 67 4f | 7c 20 3e 20 21 55 6c 74 |......gO|| > !Ult|
|00000380| 69 6d 61 74 65 2e 21 42 | 6f 6f 74 0a 7c 0a 49 63 |imate.!B|oot.|.Ic|
|00000390| 6f 6e 53 70 72 69 74 65 | 73 20 3c 4f 62 65 79 24 |onSprite|s <Obey$|
|000003a0| 44 69 72 3e 2e 21 53 70 | 72 69 74 65 73 0a 46 69 |Dir>.!Sp|rites.Fi|
|000003b0| 6c 65 44 61 74 61 82 21 | 52 75 6e 00 04 00 ce 00 |leData.!|Run.....|
|000003c0| 00 00 89 00 00 00 43 eb | ff ff 58 a5 c0 07 03 00 |......C.|..X.....|
|000003d0| 07 ce 7c 20 3e 20 21 55 | 6c 74 69 6d 61 74 65 2e |..| > !U|ltimate.|
|000003e0| 21 52 75 6e 0a 7c 0a 49 | 63 6f 6e 53 70 72 69 74 |!Run.|.I|conSprit|
|000003f0| 65 73 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 21 53 |es <Obey|$Dir>.!S|
|00000400| 70 72 69 74 65 73 0a 53 | 65 74 20 55 6c 74 69 6d |prites.S|et Ultim|
|00000410| 61 74 65 24 44 69 72 20 | 3c 4f 62 65 79 24 44 69 |ate$Dir |<Obey$Di|
|00000420| 72 3e 0a 57 69 6d 70 53 | 6c 6f 74 20 2d 6d 69 6e |r>.WimpS|lot -min|
|00000430| 20 33 32 6b 20 2d 6d 61 | 78 20 33 32 6b 0a 52 75 | 32k -ma|x 32k.Ru|
|00000440| 6e 20 3c 55 6c 74 69 6d | 61 74 65 24 44 69 72 3e |n <Ultim|ate$Dir>|
|00000450| 2e 21 52 75 6e 49 6d 61 | 67 65 0a 46 69 6c 65 44 |.!RunIma|ge.FileD|
|00000460| 61 74 61 82 21 52 75 6e | 49 6d 61 67 65 00 00 be |ata.!Run|Image...|
|00000470| 0e 00 00 43 fb ff ff c1 | 4b a2 28 03 00 ce a9 0d |...C....|K.(.....|
|00000480| 00 0a 10 f4 20 3e 21 52 | 75 6e 49 6d 61 67 65 0d |.... >!R|unImage.|
|00000490| 00 14 1f c8 9b 20 22 3c | 55 6c 74 69 6d 61 74 65 |..... "<|Ultimate|
|000004a0| 24 44 69 72 3e 2e 57 69 | 6d 70 4c 69 62 22 0d 00 |$Dir>.Wi|mpLib"..|
|000004b0| 1e 0f f2 69 6e 69 74 69 | 61 6c 69 73 65 0d 00 3c |...initi|alise..<|
|000004c0| 05 f5 0d 00 46 30 20 20 | c8 99 20 22 57 69 6d 70 |....F0 |.. "Wimp|
|000004d0| 5f 50 6f 6c 6c 22 2c 6d | 61 73 6b 25 2c 77 69 6d |_Poll",m|ask%,wim|
|000004e0| 70 5f 62 6c 6f 63 6b 25 | 20 b8 20 72 65 73 75 6c |p_block%| . resul|
|000004f0| 74 25 0d 00 50 12 20 20 | c8 8e 20 72 65 73 75 6c |t%..P. |.. resul|
|00000500| 74 25 20 ca 0d 00 56 2d | 20 20 20 20 c9 20 36 20 |t% ...V-| . 6 |
|00000510| 20 20 20 20 3a 20 f2 6d | 6f 75 73 65 5f 63 6c 69 | : .m|ouse_cli|
|00000520| 63 6b 28 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 38 |ck(wimp_|block%!8|
|00000530| 29 0d 00 59 1e 20 20 20 | 20 c9 20 39 20 20 20 20 |)..Y. | . 9 |
|00000540| 20 3a 20 f2 6d 65 6e 75 | 5f 73 65 6c 65 63 74 0d | : .menu|_select.|
|00000550| 00 5a 32 20 20 20 20 c9 | 20 31 37 2c 31 38 20 3a |.Z2 .| 17,18 :|
|00000560| 20 f2 72 65 63 65 69 76 | 65 5f 6d 65 73 73 61 67 | .receiv|e_messag|
|00000570| 65 28 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 31 36 |e(wimp_b|lock%!16|
|00000580| 29 0d 00 64 07 20 20 cb | 0d 00 6e 0f fd 20 66 69 |)..d. .|..n.. fi|
|00000590| 6e 69 73 68 65 64 25 0d | 00 78 1d f2 63 6c 6f 73 |nished%.|.x..clos|
|000005a0| 65 64 6f 77 6e 5f 77 69 | 6d 70 28 74 61 73 6b 5f |edown_wi|mp(task_|
|000005b0| 69 64 25 29 0d 00 82 05 | e0 0d 00 c8 11 dd 20 f2 |id%)....|...... .|
|000005c0| 69 6e 69 74 69 61 6c 69 | 73 65 0d 00 cd 11 20 20 |initiali|se.... |
|000005d0| de 20 62 75 66 66 65 72 | 20 34 30 0d 00 d2 1d 20 |. buffer| 40.... |
|000005e0| 20 66 69 6e 69 73 68 65 | 64 25 20 20 20 20 20 20 | finishe|d% |
|000005f0| 20 20 20 20 20 3d 20 a3 | 0d 00 dc 1d 20 20 6d 61 | = .|.... ma|
|00000600| 73 6b 25 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |sk% | |
|00000610| 20 20 3d 20 30 0d 00 e1 | 40 20 20 74 61 73 6b 5f | = 0...|@ task_|
|00000620| 69 64 25 20 20 20 20 20 | 20 20 20 20 20 20 20 3d |id% | =|
|00000630| 20 a4 69 6e 69 74 69 61 | 6c 69 73 65 5f 77 69 6d | .initia|lise_wim|
|00000640| 70 28 22 55 6c 74 69 6d | 61 74 65 20 75 74 69 6c |p("Ultim|ate util|
|00000650| 69 74 79 22 29 0d 00 e6 | 47 20 20 62 61 72 5f 69 |ity")...|G bar_i|
|00000660| 63 6f 6e 25 20 20 20 20 | 20 20 20 20 20 20 20 3d |con% | =|
|00000670| 20 a4 63 72 65 61 74 65 | 5f 62 61 72 5f 69 63 6f | .create|_bar_ico|
|00000680| 6e 28 22 21 75 6c 74 69 | 6d 61 74 65 22 2c 62 61 |n("!ulti|mate",ba|
|00000690| 72 5f 69 63 6f 6e 5f 6c | 65 66 74 29 0d 00 eb 47 |r_icon_l|eft)...G|
|000006a0| 20 20 69 63 6f 6e 5f 6d | 65 6e 75 25 20 20 20 20 | icon_m|enu% |
|000006b0| 20 20 20 20 20 20 3d 20 | a4 63 72 65 61 74 65 5f | = |.create_|
|000006c0| 6d 65 6e 75 28 22 55 6c | 74 69 6d 61 74 65 2c 49 |menu("Ul|timate,I|
|000006d0| 6e 66 6f 25 2c 4f 70 74 | 69 6f 6e 73 2c 51 75 69 |nfo%,Opt|ions,Qui|
|000006e0| 74 22 29 0d 00 f0 43 20 | 20 6f 70 74 69 6f 6e 73 |t")...C | options|
|000006f0| 5f 6d 65 6e 75 25 20 20 | 20 20 20 20 20 3d 20 a4 |_menu% | = .|
|00000700| 63 72 65 61 74 65 5f 6d | 65 6e 75 28 22 4f 70 74 |create_m|enu("Opt|
|00000710| 69 6f 6e 73 2c 43 6f 70 | 79 2c 43 6f 75 6e 74 2c |ions,Cop|y,Count,|
|00000720| 57 69 70 65 22 29 0d 00 | f5 8d 20 20 63 6f 70 79 |Wipe")..|.. copy|
|00000730| 5f 6f 70 74 69 6f 6e 73 | 5f 6d 65 6e 75 25 20 20 |_options|_menu% |
|00000740| 3d 20 a4 63 72 65 61 74 | 65 5f 6d 65 6e 75 28 22 |= .creat|e_menu("|
|00000750| 43 6f 70 79 2c 41 63 63 | 65 73 73 2c 43 6f 6e 66 |Copy,Acc|ess,Conf|
|00000760| 69 72 6d 2c 44 65 6c 65 | 74 65 2c 46 6f 72 63 65 |irm,Dele|te,Force|
|00000770| 2c 4c 6f 6f 6b 2c 4e 65 | 77 65 72 2c 50 72 6f 6d |,Look,Ne|wer,Prom|
|00000780| 70 74 2c 51 75 69 63 6b | 2c 52 65 63 75 72 73 65 |pt,Quick|,Recurse|
|00000790| 2c 53 74 61 6d 70 2c 53 | 74 72 75 63 74 75 72 65 |,Stamp,S|tructure|
|000007a0| 2c 56 65 72 62 6f 73 65 | 24 2c 44 65 66 61 75 6c |,Verbose|$,Defaul|
|000007b0| 74 22 29 0d 00 fa 52 20 | 20 63 6f 75 6e 74 5f 6f |t")...R | count_o|
|000007c0| 70 74 69 6f 6e 73 5f 6d | 65 6e 75 25 20 3d 20 a4 |ptions_m|enu% = .|
|000007d0| 63 72 65 61 74 65 5f 6d | 65 6e 75 28 22 43 6f 75 |create_m|enu("Cou|
|000007e0| 6e 74 2c 43 6f 6e 66 69 | 72 6d 2c 52 65 63 75 72 |nt,Confi|rm,Recur|
|000007f0| 73 65 2c 56 65 72 62 6f | 73 65 24 2c 44 65 66 61 |se,Verbo|se$,Defa|
|00000800| 75 6c 74 22 29 0d 00 ff | 57 20 20 77 69 70 65 5f |ult")...|W wipe_|
|00000810| 6f 70 74 69 6f 6e 73 5f | 6d 65 6e 75 25 20 20 3d |options_|menu% =|
|00000820| 20 a4 63 72 65 61 74 65 | 5f 6d 65 6e 75 28 22 57 | .create|_menu("W|
|00000830| 69 70 65 2c 43 6f 6e 66 | 69 72 6d 2c 46 6f 72 63 |ipe,Conf|irm,Forc|
|00000840| 65 2c 52 65 63 75 72 73 | 65 2c 56 65 72 62 6f 73 |e,Recurs|e,Verbos|
|00000850| 65 24 2c 44 65 66 61 75 | 6c 74 22 29 0d 01 04 2e |e$,Defau|lt")....|
|00000860| 20 20 f2 6d 65 6e 75 5f | 61 74 74 61 63 68 28 69 | .menu_|attach(i|
|00000870| 63 6f 6e 5f 6d 65 6e 75 | 25 2c 32 2c 6f 70 74 69 |con_menu|%,2,opti|
|00000880| 6f 6e 73 5f 6d 65 6e 75 | 25 29 0d 01 09 36 20 20 |ons_menu|%)...6 |
|00000890| f2 6d 65 6e 75 5f 61 74 | 74 61 63 68 28 6f 70 74 |.menu_at|tach(opt|
|000008a0| 69 6f 6e 73 5f 6d 65 6e | 75 25 2c 31 2c 63 6f 70 |ions_men|u%,1,cop|
|000008b0| 79 5f 6f 70 74 69 6f 6e | 73 5f 6d 65 6e 75 25 29 |y_option|s_menu%)|
|000008c0| 0d 01 0e 37 20 20 f2 6d | 65 6e 75 5f 61 74 74 61 |...7 .m|enu_atta|
|000008d0| 63 68 28 6f 70 74 69 6f | 6e 73 5f 6d 65 6e 75 25 |ch(optio|ns_menu%|
|000008e0| 2c 32 2c 63 6f 75 6e 74 | 5f 6f 70 74 69 6f 6e 73 |,2,count|_options|
|000008f0| 5f 6d 65 6e 75 25 29 0d | 01 13 36 20 20 f2 6d 65 |_menu%).|..6 .me|
|00000900| 6e 75 5f 61 74 74 61 63 | 68 28 6f 70 74 69 6f 6e |nu_attac|h(option|
|00000910| 73 5f 6d 65 6e 75 25 2c | 33 2c 77 69 70 65 5f 6f |s_menu%,|3,wipe_o|
|00000920| 70 74 69 6f 6e 73 5f 6d | 65 6e 75 25 29 0d 01 22 |ptions_m|enu%).."|
|00000930| 05 e1 0d 01 2c 20 dd 20 | f2 72 65 63 65 69 76 65 |...., . |.receive|
|00000940| 5f 6d 65 73 73 61 67 65 | 28 6d 65 73 73 61 67 65 |_message|(message|
|00000950| 25 29 0d 01 36 13 20 20 | c8 8e 20 6d 65 73 73 61 |%)..6. |.. messa|
|00000960| 67 65 25 20 ca 0d 01 40 | 1b 20 20 20 20 c9 20 30 |ge% ...@|. . 0|
|00000970| 20 3a 20 66 69 6e 69 73 | 68 65 64 25 20 3d 20 b9 | : finis|hed% = .|
|00000980| 0d 01 4a 07 20 20 cb 0d | 01 54 05 e1 0d 01 90 1a |..J. ..|.T......|
|00000990| dd 20 f2 6d 6f 75 73 65 | 5f 63 6c 69 63 6b 28 63 |. .mouse|_click(c|
|000009a0| 6c 69 63 6b 25 29 0d 01 | 9a 11 20 20 c8 8e 20 63 |lick%)..|.. .. c|
|000009b0| 6c 69 63 6b 25 20 ca 0d | 01 a4 17 20 20 20 20 c9 |lick% ..|... .|
|000009c0| 20 6d 65 6e 75 5f 62 75 | 74 74 6f 6e 20 3a 0d 01 | menu_bu|tton :..|
|000009d0| ae 27 20 20 20 20 20 20 | e7 20 77 69 6d 70 5f 62 |.' |. wimp_b|
|000009e0| 6c 6f 63 6b 25 21 31 32 | 20 3d 20 69 63 6f 6e 5f |lock%!12| = icon_|
|000009f0| 62 61 72 20 8c 0d 01 b8 | 19 20 20 20 20 20 20 20 |bar ....|. |
|00000a00| 20 f2 75 70 64 61 74 65 | 5f 6d 65 6e 75 73 0d 01 | .update|_menus..|
|00000a10| c2 4b 20 20 20 20 20 20 | 20 20 f2 73 68 6f 77 5f |.K | .show_|
|00000a20| 6d 65 6e 75 28 69 63 6f | 6e 5f 6d 65 6e 75 25 2c |menu(ico|n_menu%,|
|00000a30| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 2d 36 34 2c |!wimp_bl|ock%-64,|
|00000a40| a4 6d 65 6e 75 5f 68 65 | 69 67 68 74 28 69 63 6f |.menu_he|ight(ico|
|00000a50| 6e 5f 6d 65 6e 75 25 29 | 29 0d 01 cc 0b 20 20 20 |n_menu%)|).... |
|00000a60| 20 20 20 cd 0d 01 d6 07 | 20 20 cb 0d 01 e0 05 e1 | .....| ......|
|00000a70| 0d 01 f4 12 dd 20 f2 6d | 65 6e 75 5f 73 65 6c 65 |..... .m|enu_sele|
|00000a80| 63 74 0d 01 fe 1a 20 20 | ea 20 61 64 6a 75 73 74 |ct.... |. adjust|
|00000a90| 25 2c 6d 65 6e 75 5f 74 | 65 78 74 24 0d 02 08 22 |%,menu_t|ext$..."|
|00000aa0| 20 20 61 64 6a 75 73 74 | 25 20 20 20 20 3d 20 a4 | adjust|% = .|
|00000ab0| 61 64 6a 75 73 74 5f 70 | 72 65 73 73 65 64 0d 02 |adjust_p|ressed..|
|00000ac0| 12 1f 20 20 6d 65 6e 75 | 5f 74 65 78 74 24 20 3d |.. menu|_text$ =|
|00000ad0| 20 a4 64 65 63 6f 64 65 | 5f 6d 65 6e 75 0d 02 1c | .decode|_menu...|
|00000ae0| 21 20 20 c8 8e 20 a4 66 | 69 65 6c 64 28 6d 65 6e |! .. .f|ield(men|
|00000af0| 75 5f 74 65 78 74 24 2c | 22 2e 22 29 20 ca 0d 02 |u_text$,|".") ...|
|00000b00| 26 20 20 20 20 20 c9 20 | 22 51 75 69 74 22 20 3a |& . |"Quit" :|
|00000b10| 20 66 69 6e 69 73 68 65 | 64 25 20 3d 20 b9 0d 02 | finishe|d% = ...|
|00000b20| 30 15 20 20 20 20 c9 20 | 22 4f 70 74 69 6f 6e 73 |0. . |"Options|
|00000b30| 22 20 3a 0d 02 3a 25 20 | 20 20 20 20 20 c8 8e 20 |" :..:% | .. |
|00000b40| a4 66 69 65 6c 64 28 6d | 65 6e 75 5f 74 65 78 74 |.field(m|enu_text|
|00000b50| 24 2c 22 2e 22 29 20 ca | 0d 02 44 17 20 20 20 20 |$,".") .|..D. |
|00000b60| 20 20 20 20 c9 20 22 43 | 6f 70 79 22 20 20 3a 0d | . "C|opy" :.|
|00000b70| 02 4e 99 20 20 20 20 20 | 20 20 20 20 20 f2 73 65 |.N. | .se|
|00000b80| 74 5f 6f 70 74 69 6f 6e | 73 28 6d 65 6e 75 5f 74 |t_option|s(menu_t|
|00000b90| 65 78 74 24 2c 22 41 63 | 63 43 6f 6e 44 65 6c 46 |ext$,"Ac|cConDelF|
|00000ba0| 6f 72 4c 6f 6f 4e 65 77 | 50 72 6f 51 75 69 52 65 |orLooNew|ProQuiRe|
|00000bb0| 63 53 74 61 53 74 72 56 | 65 72 22 2c 22 41 43 44 |cStaStrV|er","ACD|
|00000bc0| 46 4c 4e 50 51 52 53 54 | 56 22 2c 22 43 6f 70 79 |FLNPQRST|V","Copy|
|00000bd0| 22 2c 63 6f 70 79 5f 6f | 70 74 69 6f 6e 73 5f 6d |",copy_o|ptions_m|
|00000be0| 65 6e 75 25 2c 22 41 20 | 43 20 7e 44 20 7e 46 20 |enu%,"A |C ~D ~F |
|00000bf0| 7e 4c 20 7e 4e 20 7e 50 | 20 7e 51 20 7e 52 20 7e |~L ~N ~P| ~Q ~R ~|
|00000c00| 53 20 7e 54 20 56 22 29 | 0d 02 58 17 20 20 20 20 |S ~T V")|..X. |
|00000c10| 20 20 20 20 c9 20 22 43 | 6f 75 6e 74 22 20 3a 0d | . "C|ount" :.|
|00000c20| 02 62 5e 20 20 20 20 20 | 20 20 20 20 20 f2 73 65 |.b^ | .se|
|00000c30| 74 5f 6f 70 74 69 6f 6e | 73 28 6d 65 6e 75 5f 74 |t_option|s(menu_t|
|00000c40| 65 78 74 24 2c 22 43 6f | 6e 52 65 63 56 65 72 22 |ext$,"Co|nRecVer"|
|00000c50| 2c 22 43 52 56 22 2c 22 | 43 6f 75 6e 74 22 2c 63 |,"CRV","|Count",c|
|00000c60| 6f 75 6e 74 5f 6f 70 74 | 69 6f 6e 73 5f 6d 65 6e |ount_opt|ions_men|
|00000c70| 75 25 2c 22 7e 43 20 52 | 20 7e 56 22 29 0d 02 6c |u%,"~C R| ~V")..l|
|00000c80| 17 20 20 20 20 20 20 20 | 20 c9 20 22 57 69 70 65 |. | . "Wipe|
|00000c90| 22 20 20 3a 0d 02 76 62 | 20 20 20 20 20 20 20 20 |" :..vb| |
|00000ca0| 20 20 f2 73 65 74 5f 6f | 70 74 69 6f 6e 73 28 6d | .set_o|ptions(m|
|00000cb0| 65 6e 75 5f 74 65 78 74 | 24 2c 22 43 6f 6e 46 6f |enu_text|$,"ConFo|
|00000cc0| 72 52 65 63 56 65 72 22 | 2c 22 43 46 52 56 22 2c |rRecVer"|,"CFRV",|
|00000cd0| 22 57 69 70 65 22 2c 77 | 69 70 65 5f 6f 70 74 69 |"Wipe",w|ipe_opti|
|00000ce0| 6f 6e 73 5f 6d 65 6e 75 | 25 2c 22 43 20 7e 46 20 |ons_menu|%,"C ~F |
|00000cf0| 7e 52 20 56 22 29 0d 02 | 80 0b 20 20 20 20 20 20 |~R V")..|.. |
|00000d00| cb 0d 02 8a 07 20 20 cb | 0d 02 94 2e 20 20 e7 20 |..... .|.... . |
|00000d10| 28 61 64 6a 75 73 74 25 | 20 80 20 ac 20 66 69 6e |(adjust%| . . fin|
|00000d20| 69 73 68 65 64 25 29 20 | 8c 20 f2 72 65 73 68 6f |ished%) |. .resho|
|00000d30| 77 5f 6d 65 6e 75 0d 02 | 9e 05 e1 0d 02 bc 48 dd |w_menu..|......H.|
|00000d40| 20 f2 73 65 74 5f 6f 70 | 74 69 6f 6e 73 28 6f 70 | .set_op|tions(op|
|00000d50| 74 69 6f 6e 24 2c 6f 70 | 74 69 6f 6e 73 24 2c 73 |tion$,op|tions$,s|
|00000d60| 79 73 5f 6f 70 74 69 6f | 6e 73 24 2c 73 79 73 74 |ys_optio|ns$,syst|
|00000d70| 65 6d 24 2c 6d 65 6e 75 | 25 2c 64 65 66 61 75 6c |em$,menu|%,defaul|
|00000d80| 74 24 29 0d 02 c6 1d 20 | 20 ea 20 63 6f 75 6e 74 |t$).... | . count|
|00000d90| 2c 6f 70 74 69 6f 6e 2c | 73 65 74 2c 73 65 74 24 |,option,|set,set$|
|00000da0| 0d 02 d0 25 20 20 6f 70 | 74 69 6f 6e 20 3d 20 a7 |...% op|tion = .|
|00000db0| 6f 70 74 69 6f 6e 73 24 | 2c c0 6f 70 74 69 6f 6e |options$|,.option|
|00000dc0| 24 2c 33 29 29 0d 02 da | 14 20 20 e7 20 6f 70 74 |$,3))...|. . opt|
|00000dd0| 69 6f 6e 20 3e 20 30 20 | 8c 0d 02 e4 31 20 20 20 |ion > 0 |....1 |
|00000de0| 20 f2 6d 65 6e 75 5f 74 | 69 63 6b 5f 74 6f 67 67 | .menu_t|ick_togg|
|00000df0| 6c 65 28 6d 65 6e 75 25 | 2c 28 6f 70 74 69 6f 6e |le(menu%|,(option|
|00000e00| 20 81 20 33 29 20 2b 20 | 31 29 0d 02 ee 11 20 20 | . 3) + |1).... |
|00000e10| 20 20 73 65 74 24 20 3d | 20 22 22 0d 02 f8 27 20 | set$ =| ""...' |
|00000e20| 20 20 20 e3 20 63 6f 75 | 6e 74 20 3d 20 31 20 b8 | . cou|nt = 1 .|
|00000e30| 20 28 a9 28 6f 70 74 69 | 6f 6e 73 24 29 20 81 20 | (.(opti|ons$) . |
|00000e40| 33 29 0d 03 02 29 20 20 | 20 20 20 20 73 65 74 20 |3)...) | set |
|00000e50| 3d 20 a4 6d 65 6e 75 5f | 74 69 63 6b 65 64 28 6d |= .menu_|ticked(m|
|00000e60| 65 6e 75 25 2c 63 6f 75 | 6e 74 29 0d 03 0c 2c 20 |enu%,cou|nt)..., |
|00000e70| 20 20 20 20 20 e7 20 73 | 65 74 20 8c 20 73 65 74 | . s|et . set|
|00000e80| 24 20 2b 3d 20 22 20 22 | 20 8b 20 73 65 74 24 20 |$ += " "| . set$ |
|00000e90| 2b 3d 20 22 20 7e 22 0d | 03 16 28 20 20 20 20 20 |+= " ~".|..( |
|00000ea0| 20 73 65 74 24 20 2b 3d | 20 c1 73 79 73 5f 6f 70 | set$ +=| .sys_op|
|00000eb0| 74 69 6f 6e 73 24 2c 63 | 6f 75 6e 74 2c 31 29 0d |tions$,c|ount,1).|
|00000ec0| 03 20 0f 20 20 20 20 ed | 20 63 6f 75 6e 74 0d 03 |. . .| count..|
|00000ed0| 2a 2f 20 20 20 20 ff 20 | 22 53 45 54 20 22 20 2b |*/ . |"SET " +|
|00000ee0| 20 73 79 73 74 65 6d 24 | 20 2b 20 22 24 4f 70 74 | system$| + "$Opt|
|00000ef0| 69 6f 6e 73 20 22 20 2b | 20 73 65 74 24 0d 03 34 |ions " +| set$..4|
|00000f00| 07 20 20 cc 0d 03 3e 1f | 20 20 20 20 e7 20 6f 70 |. ...>.| . op|
|00000f10| 74 69 6f 6e 24 20 3d 20 | 22 44 65 66 61 75 6c 74 |tion$ = |"Default|
|00000f20| 22 20 8c 0d 03 48 35 20 | 20 20 20 20 20 ff 20 22 |" ...H5 | . "|
|00000f30| 53 45 54 20 22 20 2b 20 | 73 79 73 74 65 6d 24 20 |SET " + |system$ |
|00000f40| 2b 20 22 24 4f 70 74 69 | 6f 6e 73 20 22 20 2b 20 |+ "$Opti|ons " + |
|00000f50| 64 65 66 61 75 6c 74 24 | 0d 03 52 17 20 20 20 20 |default$|..R. |
|00000f60| 20 20 f2 75 70 64 61 74 | 65 5f 6d 65 6e 75 73 0d | .updat|e_menus.|
|00000f70| 03 5c 09 20 20 20 20 cd | 0d 03 66 07 20 20 cd 0d |.\. .|..f. ..|
|00000f80| 03 70 05 e1 0d 03 84 13 | dd 20 f2 75 70 64 61 74 |.p......|. .updat|
|00000f90| 65 5f 6d 65 6e 75 73 0d | 03 8e 3f 20 20 f2 73 65 |e_menus.|..? .se|
|00000fa0| 74 5f 6d 65 6e 75 5f 74 | 69 63 6b 73 28 63 6f 70 |t_menu_t|icks(cop|
|00000fb0| 79 5f 6f 70 74 69 6f 6e | 73 5f 6d 65 6e 75 25 2c |y_option|s_menu%,|
|00000fc0| 22 43 6f 70 79 22 2c 22 | 41 43 44 46 4c 4e 50 51 |"Copy","|ACDFLNPQ|
|00000fd0| 52 53 54 56 22 29 0d 03 | 98 38 20 20 f2 73 65 74 |RSTV")..|.8 .set|
|00000fe0| 5f 6d 65 6e 75 5f 74 69 | 63 6b 73 28 63 6f 75 6e |_menu_ti|cks(coun|
|00000ff0| 74 5f 6f 70 74 69 6f 6e | 73 5f 6d 65 6e 75 25 2c |t_option|s_menu%,|
|00001000| 22 43 6f 75 6e 74 22 2c | 22 43 52 56 22 29 0d 03 |"Count",|"CRV")..|
|00001010| a2 37 20 20 f2 73 65 74 | 5f 6d 65 6e 75 5f 74 69 |.7 .set|_menu_ti|
|00001020| 63 6b 73 28 77 69 70 65 | 5f 6f 70 74 69 6f 6e 73 |cks(wipe|_options|
|00001030| 5f 6d 65 6e 75 25 2c 22 | 57 69 70 65 22 2c 22 43 |_menu%,"|Wipe","C|
|00001040| 46 52 56 22 29 0d 03 ac | 05 e1 0d 03 e8 2b dd 20 |FRV")...|.....+. |
|00001050| f2 73 65 74 5f 6d 65 6e | 75 5f 74 69 63 6b 73 28 |.set_men|u_ticks(|
|00001060| 6d 65 6e 75 25 2c 73 79 | 73 74 65 6d 24 2c 76 61 |menu%,sy|stem$,va|
|00001070| 6c 69 64 24 29 0d 03 f2 | 22 20 20 ea 20 6f 70 74 |lid$)...|" . opt|
|00001080| 69 6f 6e 2c 6f 70 74 69 | 6f 6e 24 2c 74 69 63 6b |ion,opti|on$,tick|
|00001090| 5f 76 61 6c 75 65 25 0d | 03 fc 48 20 20 6f 70 74 |_value%.|..H opt|
|000010a0| 69 6f 6e 24 20 3d 20 a4 | 72 65 61 64 5f 73 79 73 |ion$ = .|read_sys|
|000010b0| 74 65 6d 5f 76 61 72 69 | 61 62 6c 65 28 73 79 73 |tem_vari|able(sys|
|000010c0| 74 65 6d 24 20 2b 20 22 | 24 4f 70 74 69 6f 6e 73 |tem$ + "|$Options|
|000010d0| 22 2c 76 61 6c 69 64 24 | 20 2b 20 22 7e 22 29 0d |",valid$| + "~").|
|000010e0| 04 06 16 20 20 c8 95 20 | 6f 70 74 69 6f 6e 24 20 |... .. |option$ |
|000010f0| 3c 3e 20 22 22 0d 04 10 | 1d 20 20 20 20 e7 20 c0 |<> ""...|. . .|
|00001100| 6f 70 74 69 6f 6e 24 2c | 31 29 20 3d 20 22 7e 22 |option$,|1) = "~"|
|00001110| 20 8c 0d 04 1a 19 20 20 | 20 20 20 20 74 69 63 6b | ..... | tick|
|00001120| 5f 76 61 6c 75 65 25 20 | 3d 20 a3 0d 04 24 2c 20 |_value% |= ...$, |
|00001130| 20 20 20 20 20 6f 70 74 | 69 6f 6e 24 20 3d 20 c2 | opt|ion$ = .|
|00001140| 6f 70 74 69 6f 6e 24 2c | a9 28 6f 70 74 69 6f 6e |option$,|.(option|
|00001150| 24 29 20 2d 20 31 29 0d | 04 2e 09 20 20 20 20 cc |$) - 1).|... .|
|00001160| 0d 04 38 19 20 20 20 20 | 20 20 74 69 63 6b 5f 76 |..8. | tick_v|
|00001170| 61 6c 75 65 25 20 3d 20 | b9 0d 04 42 09 20 20 20 |alue% = |...B. |
|00001180| 20 cd 0d 04 4c 25 20 20 | 20 20 6f 70 74 69 6f 6e | ...L% | option|
|00001190| 20 3d 20 a7 76 61 6c 69 | 64 24 2c c0 6f 70 74 69 | = .vali|d$,.opti|
|000011a0| 6f 6e 24 2c 31 29 29 0d | 04 56 3f 20 20 20 20 e7 |on$,1)).|.V? .|
|000011b0| 20 6f 70 74 69 6f 6e 20 | 3e 20 30 20 8c 20 f2 73 | option |> 0 . .s|
|000011c0| 65 74 5f 6d 65 6e 75 5f | 74 69 63 6b 28 6d 65 6e |et_menu_|tick(men|
|000011d0| 75 25 2c 6f 70 74 69 6f | 6e 2c 74 69 63 6b 5f 76 |u%,optio|n,tick_v|
|000011e0| 61 6c 75 65 25 29 0d 04 | 60 2a 20 20 20 20 6f 70 |alue%)..|`* op|
|000011f0| 74 69 6f 6e 24 20 3d 20 | c2 6f 70 74 69 6f 6e 24 |tion$ = |.option$|
|00001200| 2c a9 28 6f 70 74 69 6f | 6e 24 29 20 2d 20 31 29 |,.(optio|n$) - 1)|
|00001210| 0d 04 6a 07 20 20 ce 0d | 04 74 05 e1 0d 04 b0 2d |..j. ..|.t.....-|
|00001220| dd 20 a4 72 65 61 64 5f | 73 79 73 74 65 6d 5f 76 |. .read_|system_v|
|00001230| 61 72 69 61 62 6c 65 28 | 76 61 72 69 61 62 6c 65 |ariable(|variable|
|00001240| 24 2c 6d 61 74 63 68 24 | 29 0d 04 ba 1a 20 20 ea |$,match$|).... .|
|00001250| 20 6f 70 74 69 6f 6e 24 | 2c 62 79 74 65 73 2c 6c | option$|,bytes,l|
|00001260| 6f 6f 70 0d 04 c4 12 20 | 20 6f 70 74 69 6f 6e 24 |oop.... | option$|
|00001270| 20 3d 20 22 22 0d 04 ce | 38 20 20 c8 99 20 22 4f | = ""...|8 .. "O|
|00001280| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 76 61 |S_ReadVa|rVal",va|
|00001290| 72 69 61 62 6c 65 24 2c | 62 75 66 66 65 72 2c 34 |riable$,|buffer,4|
|000012a0| 30 2c 30 20 b8 20 2c 2c | 62 79 74 65 73 0d 04 d8 |0,0 . ,,|bytes...|
|000012b0| 1d 20 20 62 75 66 66 65 | 72 3f 28 62 79 74 65 73 |. buffe|r?(bytes|
|000012c0| 20 2b 20 31 29 20 3d 20 | 31 33 0d 04 e2 18 20 20 | + 1) = |13.... |
|000012d0| e3 20 6c 6f 6f 70 20 3d | 20 30 20 b8 20 62 79 74 |. loop =| 0 . byt|
|000012e0| 65 73 0d 04 ec 41 20 20 | 20 20 e7 20 a7 6d 61 74 |es...A | . .mat|
|000012f0| 63 68 24 2c bd 28 62 75 | 66 66 65 72 3f 6c 6f 6f |ch$,.(bu|ffer?loo|
|00001300| 70 29 29 20 3e 20 30 20 | 8c 20 6f 70 74 69 6f 6e |p)) > 0 |. option|
|00001310| 24 20 2b 3d 20 bd 28 62 | 75 66 66 65 72 3f 6c 6f |$ += .(b|uffer?lo|
|00001320| 6f 70 29 0d 04 f6 0c 20 | 20 ed 20 6c 6f 6f 70 0d |op).... | . loop.|
|00001330| 05 00 0c 3d 6f 70 74 69 | 6f 6e 24 0d ff 46 69 6c |...=opti|on$..Fil|
|00001340| 65 44 61 74 61 82 21 53 | 70 72 69 74 65 73 00 00 |eData.!S|prites..|
|00001350| 00 e0 02 00 00 43 f9 ff | ff 9c 60 c0 07 03 00 2f |.....C..|..`..../|
|00001360| 25 01 00 00 00 10 00 00 | 00 e4 02 00 00 d4 02 00 |%.......|........|
|00001370| 00 21 75 6c 74 69 6d 61 | 74 65 00 00 00 04 00 00 |.!ultima|te......|
|00001380| 00 10 00 00 00 00 00 00 | 00 07 00 00 00 2c 00 00 |........|.....,..|
|00001390| 00 80 01 00 00 0c 00 00 | 00 77 77 77 77 77 77 77 |........|.wwwwwww|
|000013a0| 77 77 77 00 00 00 77 88 | 88 78 00 00 00 87 88 88 |www...w.|.x......|
|000013b0| bb 88 bb 8b b8 8b bb bb | bb bb bb bb 0b 70 00 00 |........|.....p..|
|000013c0| 00 77 88 bb 8e ee b8 b8 | 8b 8b bb bb bb bb bb bb |.w......|........|
|000013d0| 8b 78 00 00 00 77 88 eb | 8e ee e8 b8 89 89 b9 bb |.x...w..|........|
|000013e0| bb bb bb bb 7b 77 00 00 | 00 77 88 a8 aa 88 aa 89 |....{w..|.w......|
|000013f0| 98 89 88 98 b9 bb bb bb | 7b 70 00 00 00 77 88 e8 |........|{p...w..|
|00001400| ee ee ee 99 99 99 99 99 | bb bb 99 bb bb 70 00 00 |........|.....p..|
|00001410| 00 87 88 00 ee ee 9e 99 | 99 99 99 bb bb 99 99 bb |........|........|
|00001420| 7b 70 00 00 00 87 88 bb | bb 9a 99 99 99 99 bb bb |{p......|........|
|00001430| 9b 99 99 bb 7b 70 00 00 | 00 87 88 77 bb 9a 99 99 |....{p..|...w....|
|00001440| 99 bb bb bb bb bb 99 bb | 7b 77 00 00 00 87 8b bb |........|{w......|
|00001450| bb ba bb bb bb bb bb 99 | 99 bb bb bb 0b 77 00 00 |........|.....w..|
|00001460| 00 77 77 00 b8 ba 99 bb | bb 99 99 99 b9 bb bb bb |.ww.....|........|
|00001470| 8b 77 00 00 00 77 77 87 | 08 ba bb bb 99 99 b9 bb |.w...ww.|........|
|00001480| bb bb 00 bb 0b 77 00 00 | 00 77 77 77 00 bb bb bb |.....w..|.www....|
|00001490| bb bb bb bb bb bb 80 bb | 0b 77 00 00 00 77 77 77 |........|.w...www|
|000014a0| bb bb bb bb bb bb bb bb | bb 0b f8 bb 0b 77 00 00 |........|.....w..|
|000014b0| 00 77 00 bb bb 77 b7 bb | bb bb bb bb bb eb 89 bb |.w...w..|........|
|000014c0| 0b 77 00 00 00 77 bb bb | 80 77 07 b0 bb bb bb bb |.w...w..|.w......|
|000014d0| bb ee 00 bb 0b 77 00 00 | 00 77 77 77 77 77 77 77 |.....w..|.wwwwwww|
|000014e0| b0 bb bb 7b 77 77 77 77 | 77 77 00 00 00 00 00 00 |...{wwww|ww......|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00001500| ff f0 ff ff 00 ff 00 f0 | 0f f0 00 00 00 00 00 00 |........|........|
|00001510| 0f 00 ff ff ff 00 f0 00 | f0 00 0f 0f f0 f0 00 00 |........|........|
|00001520| 00 00 00 ff 0f 00 ff ff | ff 00 f0 00 f0 00 0f 0f |........|........|
|00001530| f0 f0 00 00 00 00 ff ff | 0f 00 ff ff ff 00 f0 00 |........|........|
|00001540| 00 ff 00 f0 0f f0 ff 0f | 00 ff ff ff 0f 00 ff ff |........|........|
|00001550| ff 00 00 00 00 00 00 00 | 00 00 00 00 ff ff 00 ff |........|........|
|00001560| 0f 00 ff ff ff 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00001570| ff 00 00 ff 0f 00 ff ff | ff 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 ff ff 0f 00 00 ff | 0f 00 ff ff ff 00 00 00 |........|........|
|00001590| 00 00 00 00 00 ff ff ff | ff ff 00 ff 0f 00 ff ff |........|........|
|000015a0| ff 00 00 00 00 00 00 00 | ff ff 00 00 00 f0 ff ff |........|........|
|000015b0| 0f 00 ff ff ff 00 00 00 | 00 00 00 ff ff 00 00 00 |........|........|
|000015c0| 00 00 f0 ff 0f 00 ff ff | ff 00 00 00 00 00 ff ff |........|........|
|000015d0| 00 00 00 00 00 00 00 ff | 0f 00 ff ff ff 00 00 00 |........|........|
|000015e0| 00 ff ff 00 00 00 00 00 | 00 00 00 ff 0f 00 ff ff |........|........|
|000015f0| ff 00 00 00 ff ff 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00001600| 0f 00 ff ff ff 00 00 ff | ff 00 00 00 00 00 00 00 |........|........|
|00001610| 00 00 00 ff 0f 00 ff ff | ff 00 ff ff 00 00 00 00 |........|........|
|00001620| 00 00 00 00 00 00 00 ff | 0f 00 ff ff ff 00 00 00 |........|........|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00001640| ff 46 69 6c 65 44 61 74 | 61 82 57 69 6d 70 4c 69 |.FileDat|a.WimpLi|
|00001650| 62 00 00 00 00 0a 0e 00 | 00 43 fb ff ff 6f 9b a9 |b.......|.C...o..|
|00001660| 27 03 00 3d db 0d 00 0a | 0e f4 20 3e 57 69 6d 70 |'..=....|.. >Wimp|
|00001670| 4c 69 62 0d 00 14 21 dd | 20 a4 69 6e 69 74 69 61 |Lib...!.| .initia|
|00001680| 6c 69 73 65 5f 77 69 6d | 70 28 61 70 70 5f 6e 61 |lise_wim|p(app_na|
|00001690| 6d 65 24 29 0d 00 19 19 | 20 20 ea 20 74 61 73 6b |me$)....| . task|
|000016a0| 5f 69 64 25 2c 76 65 72 | 73 69 6f 6e 25 0d 00 1e |_id%,ver|sion%...|
|000016b0| 38 20 20 de 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |8 . wim|p_block%|
|000016c0| 20 35 31 32 2c 6d 65 6e | 75 5f 62 6c 6f 63 6b 25 | 512,men|u_block%|
|000016d0| 20 26 31 30 30 30 2c 64 | 61 74 61 5f 62 6c 6f 63 | &1000,d|ata_bloc|
|000016e0| 6b 25 20 36 34 0d 00 23 | 1e 20 20 6d 65 6e 75 5f |k% 64..#|. menu_|
|000016f0| 66 72 65 65 25 20 3d 20 | 6d 65 6e 75 5f 62 6c 6f |free% = |menu_blo|
|00001700| 63 6b 25 0d 00 28 46 20 | 20 c8 99 20 22 57 69 6d |ck%..(F | .. "Wim|
|00001710| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|00001720| 30 2c 26 34 42 35 33 34 | 31 35 34 2c 61 70 70 5f |0,&4B534|154,app_|
|00001730| 6e 61 6d 65 24 20 b8 20 | 76 65 72 73 69 6f 6e 25 |name$ . |version%|
|00001740| 2c 74 61 73 6b 5f 69 64 | 25 0d 00 32 19 20 20 62 |,task_id|%..2. b|
|00001750| 61 72 5f 69 63 6f 6e 5f | 6c 65 66 74 20 20 3d 20 |ar_icon_|left = |
|00001760| 2d 32 0d 00 3c 19 20 20 | 62 61 72 5f 69 63 6f 6e |-2..<. |bar_icon|
|00001770| 5f 72 69 67 68 74 20 3d | 20 2d 31 0d 00 3d 2a 20 |_right =| -1..=* |
|00001780| 20 61 64 6a 75 73 74 5f | 62 75 74 74 6f 6e 20 20 | adjust_|button |
|00001790| 3d 20 31 20 3a 20 6d 65 | 6e 75 5f 62 75 74 74 6f |= 1 : me|nu_butto|
|000017a0| 6e 20 3d 20 32 0d 00 3e | 2b 20 20 73 65 6c 65 63 |n = 2..>|+ selec|
|000017b0| 74 5f 62 75 74 74 6f 6e | 20 20 3d 20 34 20 3a 20 |t_button| = 4 : |
|000017c0| 69 63 6f 6e 5f 62 61 72 | 20 20 20 20 3d 20 2d 32 |icon_bar| = -2|
|000017d0| 0d 00 41 19 20 20 63 75 | 72 72 65 6e 74 5f 6d 65 |..A. cu|rrent_me|
|000017e0| 6e 75 25 20 20 3d 20 2d | 31 0d 00 42 2a 20 20 6d |nu% = -|1..B* m|
|000017f0| 65 6e 75 5f 78 25 20 20 | 20 20 20 20 20 20 3d 20 |enu_x% | = |
|00001800| 30 20 3a 20 6d 65 6e 75 | 5f 79 25 20 20 20 20 20 |0 : menu|_y% |
|00001810| 3d 20 30 0d 00 46 0d 3d | 74 61 73 6b 5f 69 64 25 |= 0..F.=|task_id%|
|00001820| 0d 00 64 2a dd 20 a4 63 | 72 65 61 74 65 5f 62 61 |..d*. .c|reate_ba|
|00001830| 72 5f 69 63 6f 6e 28 61 | 70 70 5f 6e 61 6d 65 24 |r_icon(a|pp_name$|
|00001840| 2c 70 6f 73 69 74 69 6f | 6e 29 0d 00 69 0d 20 20 |,positio|n)..i. |
|00001850| ea 20 69 63 6f 6e 25 0d | 00 6e 1f 20 20 77 69 6d |. icon%.|.n. wim|
|00001860| 70 5f 62 6c 6f 63 6b 25 | 21 30 20 20 3d 20 70 6f |p_block%|!0 = po|
|00001870| 73 69 74 69 6f 6e 0d 00 | 78 18 20 20 77 69 6d 70 |sition..|x. wimp|
|00001880| 5f 62 6c 6f 63 6b 25 21 | 34 20 20 3d 20 30 0d 00 |_block%!|4 = 0..|
|00001890| 82 18 20 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |.. wimp|_block%!|
|000018a0| 38 20 20 3d 20 30 0d 00 | 8c 19 20 20 77 69 6d 70 |8 = 0..|.. wimp|
|000018b0| 5f 62 6c 6f 63 6b 25 21 | 31 32 20 3d 20 36 38 0d |_block%!|12 = 68.|
|000018c0| 00 96 19 20 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |... wim|p_block%|
|000018d0| 21 31 36 20 3d 20 36 38 | 0d 00 a0 1c 20 20 77 69 |!16 = 68|.... wi|
|000018e0| 6d 70 5f 62 6c 6f 63 6b | 25 21 32 30 20 3d 20 26 |mp_block|%!20 = &|
|000018f0| 33 30 30 32 0d 00 aa 25 | 20 20 24 28 77 69 6d 70 |3002...%| $(wimp|
|00001900| 5f 62 6c 6f 63 6b 25 20 | 2b 20 32 34 29 20 3d 20 |_block% |+ 24) = |
|00001910| 61 70 70 5f 6e 61 6d 65 | 24 0d 00 b4 2f 20 20 c8 |app_name|$.../ .|
|00001920| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 49 63 |. "Wimp_|CreateIc|
|00001930| 6f 6e 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |on",,wim|p_block%|
|00001940| 20 b8 20 69 63 6f 6e 25 | 0d 00 be 0a 3d 69 63 6f | . icon%|....=ico|
|00001950| 6e 25 0d 00 c8 1f dd 20 | f2 63 6c 6f 73 65 64 6f |n%..... |.closedo|
|00001960| 77 6e 5f 77 69 6d 70 28 | 74 61 73 6b 5f 69 64 25 |wn_wimp(|task_id%|
|00001970| 29 0d 00 d2 2c 20 20 c8 | 99 20 22 57 69 6d 70 5f |)..., .|. "Wimp_|
|00001980| 43 6c 6f 73 65 44 6f 77 | 6e 22 2c 74 61 73 6b 5f |CloseDow|n",task_|
|00001990| 69 64 25 2c 26 34 42 35 | 33 34 31 35 34 0d 00 dc |id%,&4B5|34154...|
|000019a0| 05 e1 0d 01 2c 19 dd 20 | a4 63 72 65 61 74 65 5f |....,.. |.create_|
|000019b0| 6d 65 6e 75 28 6d 65 6e | 75 24 29 0d 01 36 1f 20 |menu(men|u$)..6. |
|000019c0| 20 ea 20 6d 65 6e 75 5f | 70 74 72 25 2c 77 69 64 | . menu_|ptr%,wid|
|000019d0| 74 68 25 2c 74 69 74 6c | 65 24 0d 01 40 1c 20 20 |th%,titl|e$..@. |
|000019e0| 6d 65 6e 75 5f 70 74 72 | 25 20 3d 20 6d 65 6e 75 |menu_ptr|% = menu|
|000019f0| 5f 66 72 65 65 25 0d 01 | 4a 23 20 20 74 69 74 6c |_free%..|J# titl|
|00001a00| 65 24 20 20 20 20 3d 20 | a4 66 69 65 6c 64 28 6d |e$ = |.field(m|
|00001a10| 65 6e 75 24 2c 22 2c 22 | 29 0d 01 54 18 20 20 e7 |enu$,","|)..T. .|
|00001a20| 20 a9 28 74 69 74 6c 65 | 24 29 20 3e 20 31 32 20 | .(title|$) > 12 |
|00001a30| 8c 0d 01 5e 22 20 20 20 | 20 24 28 6d 65 6e 75 5f |...^" | $(menu_|
|00001a40| 70 74 72 25 29 20 3d 20 | c0 74 69 74 6c 65 24 2c |ptr%) = |.title$,|
|00001a50| 31 32 29 0d 01 68 13 20 | 20 20 20 77 69 64 74 68 |12)..h. | width|
|00001a60| 25 20 3d 20 31 32 0d 01 | 72 07 20 20 cc 0d 01 7c |% = 12..|r. ...||
|00001a70| 1d 20 20 20 20 24 28 6d | 65 6e 75 5f 70 74 72 25 |. $(m|enu_ptr%|
|00001a80| 29 20 3d 20 74 69 74 6c | 65 24 0d 01 86 1a 20 20 |) = titl|e$.... |
|00001a90| 20 20 77 69 64 74 68 25 | 20 3d 20 a9 28 74 69 74 | width%| = .(tit|
|00001aa0| 6c 65 24 29 0d 01 90 07 | 20 20 cd 0d 01 9a 2a 20 |le$)....| ....* |
|00001ab0| 20 6d 65 6e 75 5f 70 74 | 72 25 3f 31 32 20 3d 20 | menu_pt|r%?12 = |
|00001ac0| 37 20 20 3a 20 6d 65 6e | 75 5f 70 74 72 25 3f 31 |7 : men|u_ptr%?1|
|00001ad0| 33 20 3d 20 32 0d 01 a4 | 2a 20 20 6d 65 6e 75 5f |3 = 2...|* menu_|
|00001ae0| 70 74 72 25 3f 31 34 20 | 3d 20 37 20 20 3a 20 6d |ptr%?14 |= 7 : m|
|00001af0| 65 6e 75 5f 70 74 72 25 | 3f 31 35 20 3d 20 30 0d |enu_ptr%|?15 = 0.|
|00001b00| 01 ae 2a 20 20 6d 65 6e | 75 5f 70 74 72 25 21 32 |..* men|u_ptr%!2|
|00001b10| 30 20 3d 20 34 34 20 3a | 20 6d 65 6e 75 5f 70 74 |0 = 44 :| menu_pt|
|00001b20| 72 25 21 32 34 20 3d 20 | 30 0d 01 b8 24 20 20 6d |r%!24 = |0...$ m|
|00001b30| 65 6e 75 5f 69 74 65 6d | 5f 70 74 72 25 20 3d 20 |enu_item|_ptr% = |
|00001b40| 6d 65 6e 75 5f 70 74 72 | 25 20 2b 20 34 0d 01 c2 |menu_ptr|% + 4...|
|00001b50| 14 20 20 c8 95 20 6d 65 | 6e 75 24 20 3c 3e 20 22 |. .. me|nu$ <> "|
|00001b60| 22 0d 01 cc 1c 20 20 20 | 20 6d 65 6e 75 5f 69 74 |".... | menu_it|
|00001b70| 65 6d 5f 70 74 72 25 20 | 2b 3d 20 32 34 0d 01 d6 |em_ptr% |+= 24...|
|00001b80| 26 20 20 20 20 6d 65 6e | 75 5f 69 74 65 6d 24 20 |& men|u_item$ |
|00001b90| 3d 20 a4 66 69 65 6c 64 | 28 6d 65 6e 75 24 2c 22 |= .field|(menu$,"|
|00001ba0| 2c 22 29 0d 01 e0 1c 20 | 20 20 20 21 6d 65 6e 75 |,").... | !menu|
|00001bb0| 5f 69 74 65 6d 5f 70 74 | 72 25 20 20 3d 20 30 0d |_item_pt|r% = 0.|
|00001bc0| 01 ea 1d 20 20 20 20 6d | 65 6e 75 5f 69 74 65 6d |... m|enu_item|
|00001bd0| 5f 70 74 72 25 21 34 20 | 3d 20 2d 31 0d 01 f4 23 |_ptr%!4 |= -1...#|
|00001be0| 20 20 20 20 6d 65 6e 75 | 5f 69 74 65 6d 5f 70 74 | menu|_item_pt|
|00001bf0| 72 25 21 38 20 3d 20 26 | 37 30 30 30 30 32 31 0d |r%!8 = &|7000021.|
|00001c00| 01 fe 24 20 20 20 20 c8 | 95 20 a7 22 23 24 25 5e |..$ .|. ."#$%^|
|00001c10| 22 2c c2 6d 65 6e 75 5f | 69 74 65 6d 24 29 29 20 |",.menu_|item$)) |
|00001c20| 3e 20 30 0d 02 08 1b 20 | 20 20 20 20 20 c8 8e 20 |> 0.... | .. |
|00001c30| c2 6d 65 6e 75 5f 69 74 | 65 6d 24 29 20 ca 0d 02 |.menu_it|em$) ...|
|00001c40| 12 45 20 20 20 20 20 20 | 20 20 c9 20 22 23 22 20 |.E | . "#" |
|00001c50| 3a 20 3f 6d 65 6e 75 5f | 69 74 65 6d 5f 70 74 72 |: ?menu_|item_ptr|
|00001c60| 25 20 20 20 3d 20 3f 6d | 65 6e 75 5f 69 74 65 6d |% = ?m|enu_item|
|00001c70| 5f 70 74 72 25 20 20 20 | 84 20 25 30 30 30 30 30 |_ptr% |. %00000|
|00001c80| 30 30 31 0d 02 1c 45 20 | 20 20 20 20 20 20 20 c9 |001...E | .|
|00001c90| 20 22 24 22 20 3a 20 3f | 6d 65 6e 75 5f 69 74 65 | "$" : ?|menu_ite|
|00001ca0| 6d 5f 70 74 72 25 20 20 | 20 3d 20 3f 6d 65 6e 75 |m_ptr% | = ?menu|
|00001cb0| 5f 69 74 65 6d 5f 70 74 | 72 25 20 20 20 84 20 25 |_item_pt|r% . %|
|00001cc0| 30 30 30 30 30 30 31 30 | 0d 02 26 45 20 20 20 20 |00000010|..&E |
|00001cd0| 20 20 20 20 c9 20 22 25 | 22 20 3a 20 6d 65 6e 75 | . "%|" : menu|
|00001ce0| 5f 69 74 65 6d 5f 70 74 | 72 25 3f 31 30 20 3d 20 |_item_pt|r%?10 = |
|00001cf0| 6d 65 6e 75 5f 69 74 65 | 6d 5f 70 74 72 25 3f 31 |menu_ite|m_ptr%?1|
|00001d00| 30 20 84 20 25 30 31 30 | 30 30 30 30 30 0d 02 30 |0 . %010|00000..0|
|00001d10| 45 20 20 20 20 20 20 20 | 20 c9 20 22 5e 22 20 3a |E | . "^" :|
|00001d20| 20 3f 6d 65 6e 75 5f 69 | 74 65 6d 5f 70 74 72 25 | ?menu_i|tem_ptr%|
|00001d30| 20 20 20 3d 20 3f 6d 65 | 6e 75 5f 69 74 65 6d 5f | = ?me|nu_item_|
|00001d40| 70 74 72 25 20 20 20 84 | 20 25 30 30 30 30 30 31 |ptr% .| %000001|
|00001d50| 30 30 0d 02 3a 0b 20 20 | 20 20 20 20 cb 0d 02 44 |00..:. | ...D|
|00001d60| 23 20 20 20 20 20 20 6d | 65 6e 75 5f 69 74 65 6d |# m|enu_item|
|00001d70| 24 20 3d 20 c0 6d 65 6e | 75 5f 69 74 65 6d 24 29 |$ = .men|u_item$)|
|00001d80| 0d 02 4e 09 20 20 20 20 | ce 0d 02 58 39 20 20 20 |..N. |...X9 |
|00001d90| 20 e7 20 a9 28 6d 65 6e | 75 5f 69 74 65 6d 24 29 | . .(men|u_item$)|
|00001da0| 20 3e 20 77 69 64 74 68 | 25 20 8c 20 77 69 64 74 | > width|% . widt|
|00001db0| 68 25 20 3d 20 a9 28 6d | 65 6e 75 5f 69 74 65 6d |h% = .(m|enu_item|
|00001dc0| 24 29 0d 02 62 30 20 20 | 20 20 24 28 6d 65 6e 75 |$)..b0 | $(menu|
|00001dd0| 5f 69 74 65 6d 5f 70 74 | 72 25 2b 31 32 29 20 3d |_item_pt|r%+12) =|
|00001de0| 20 6d 65 6e 75 5f 69 74 | 65 6d 24 20 2b 20 bd 28 | menu_it|em$ + .(|
|00001df0| 30 29 0d 02 6c 07 20 20 | ce 0d 02 76 33 20 20 3f |0)..l. |...v3 ?|
|00001e00| 6d 65 6e 75 5f 69 74 65 | 6d 5f 70 74 72 25 20 3d |menu_ite|m_ptr% =|
|00001e10| 20 3f 6d 65 6e 75 5f 69 | 74 65 6d 5f 70 74 72 25 | ?menu_i|tem_ptr%|
|00001e20| 20 84 20 25 31 30 30 30 | 30 30 30 30 0d 02 80 2c | . %1000|0000...,|
|00001e30| 20 20 6d 65 6e 75 5f 70 | 74 72 25 21 31 36 20 20 | menu_p|tr%!16 |
|00001e40| 20 20 3d 20 28 77 69 64 | 74 68 25 20 2a 20 38 20 | = (wid|th% * 8 |
|00001e50| 2b 20 36 29 20 2a 20 32 | 0d 02 8a 2b 20 20 6d 65 |+ 6) * 2|...+ me|
|00001e60| 6e 75 5f 66 72 65 65 25 | 20 20 20 20 20 20 3d 20 |nu_free%| = |
|00001e70| 6d 65 6e 75 5f 69 74 65 | 6d 5f 70 74 72 25 20 2b |menu_ite|m_ptr% +|
|00001e80| 20 32 34 0d 02 94 0e 3d | 6d 65 6e 75 5f 70 74 72 | 24....=|menu_ptr|
|00001e90| 25 0d 02 bc 1d dd 20 f2 | 73 68 6f 77 5f 6d 65 6e |%..... .|show_men|
|00001ea0| 75 28 6d 65 6e 75 25 2c | 78 25 2c 79 25 29 0d 02 |u(menu%,|x%,y%)..|
|00001eb0| c6 1b 20 20 63 75 72 72 | 65 6e 74 5f 6d 65 6e 75 |.. curr|ent_menu|
|00001ec0| 25 20 3d 20 6d 65 6e 75 | 25 0d 02 d0 18 20 20 6d |% = menu|%.... m|
|00001ed0| 65 6e 75 5f 78 25 20 20 | 20 20 20 20 20 3d 20 78 |enu_x% | = x|
|00001ee0| 25 0d 02 da 18 20 20 6d | 65 6e 75 5f 79 25 20 20 |%.... m|enu_y% |
|00001ef0| 20 20 20 20 20 3d 20 79 | 25 0d 02 e4 27 20 20 c8 | = y|%...' .|
|00001f00| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00001f10| 6e 75 22 2c 2c 6d 65 6e | 75 25 2c 78 25 2c 79 25 |nu",,men|u%,x%,y%|
|00001f20| 0d 02 ee 05 e1 0d 03 20 | 12 dd 20 f2 72 65 73 68 |....... |.. .resh|
|00001f30| 6f 77 5f 6d 65 6e 75 0d | 03 2a 2f 20 20 f2 73 68 |ow_menu.|.*/ .sh|
|00001f40| 6f 77 5f 6d 65 6e 75 28 | 63 75 72 72 65 6e 74 5f |ow_menu(|current_|
|00001f50| 6d 65 6e 75 25 2c 6d 65 | 6e 75 5f 78 25 2c 6d 65 |menu%,me|nu_x%,me|
|00001f60| 6e 75 5f 79 25 29 0d 03 | 34 05 e1 0d 03 84 12 dd |nu_y%)..|4.......|
|00001f70| 20 a4 64 65 63 6f 64 65 | 5f 6d 65 6e 75 0d 03 8e | .decode|_menu...|
|00001f80| 12 20 20 ea 20 6d 65 6e | 75 5f 74 65 78 74 24 0d |. . men|u_text$.|
|00001f90| 03 98 4f 20 20 c8 99 20 | 22 57 69 6d 70 5f 44 65 |..O .. |"Wimp_De|
|00001fa0| 63 6f 64 65 4d 65 6e 75 | 22 2c 2c 63 75 72 72 65 |codeMenu|",,curre|
|00001fb0| 6e 74 5f 6d 65 6e 75 25 | 2c 77 69 6d 70 5f 62 6c |nt_menu%|,wimp_bl|
|00001fc0| 6f 63 6b 25 2c c4 32 30 | 30 2c 22 20 22 29 20 b8 |ock%,.20|0," ") .|
|00001fd0| 20 2c 2c 2c 6d 65 6e 75 | 5f 74 65 78 74 24 0d 03 | ,,,menu|_text$..|
|00001fe0| a2 0f 3d 6d 65 6e 75 5f | 74 65 78 74 24 0d 03 e8 |..=menu_|text$...|
|00001ff0| 2f dd 20 f2 6d 65 6e 75 | 5f 61 74 74 61 63 68 28 |/. .menu|_attach(|
|00002000| 6d 65 6e 75 25 2c 70 6f | 73 69 74 69 6f 6e 25 2c |menu%,po|sition%,|
|00002010| 61 74 74 61 63 68 6d 65 | 6e 74 25 29 0d 03 f2 39 |attachme|nt%)...9|
|00002020| 20 20 6d 65 6e 75 25 21 | 28 32 38 20 2b 20 32 34 | menu%!|(28 + 24|
|00002030| 20 2a 20 28 70 6f 73 69 | 74 69 6f 6e 25 20 2d 20 | * (posi|tion% - |
|00002040| 31 29 20 2b 20 34 29 20 | 3d 20 61 74 74 61 63 68 |1) + 4) |= attach|
|00002050| 6d 65 6e 74 25 0d 03 fc | 05 e1 0d 04 4c 19 dd 20 |ment%...|....L.. |
|00002060| a4 6d 65 6e 75 5f 68 65 | 69 67 68 74 28 6d 65 6e |.menu_he|ight(men|
|00002070| 75 25 29 0d 04 56 1e 20 | 20 ea 20 68 65 69 67 68 |u%)..V. | . heigh|
|00002080| 74 25 2c 6d 65 6e 75 5f | 69 74 65 6d 5f 70 74 72 |t%,menu_|item_ptr|
|00002090| 25 0d 04 60 21 20 20 6d | 65 6e 75 5f 69 74 65 6d |%..`! m|enu_item|
|000020a0| 5f 70 74 72 25 20 3d 20 | 6d 65 6e 75 25 20 2b 20 |_ptr% = |menu% + |
|000020b0| 32 38 0d 04 6a 18 20 20 | 68 65 69 67 68 74 25 20 |28..j. |height% |
|000020c0| 20 20 20 20 20 20 20 3d | 20 30 0d 04 74 2a 20 20 | =| 0..t* |
|000020d0| c8 95 20 28 3f 6d 65 6e | 75 5f 69 74 65 6d 5f 70 |.. (?men|u_item_p|
|000020e0| 74 72 25 20 80 20 25 31 | 30 30 30 30 30 30 30 29 |tr% . %1|0000000)|
|000020f0| 20 3d 20 30 0d 04 7e 1c | 20 20 20 20 6d 65 6e 75 | = 0..~.| menu|
|00002100| 5f 69 74 65 6d 5f 70 74 | 72 25 20 2b 3d 20 32 34 |_item_pt|r% += 24|
|00002110| 0d 04 88 1b 20 20 20 20 | 68 65 69 67 68 74 25 20 |.... |height% |
|00002120| 20 20 20 20 20 20 20 2b | 3d 20 31 0d 04 92 07 20 | +|= 1.... |
|00002130| 20 ce 0d 04 9c 1e 3d 39 | 36 20 2b 20 28 34 34 20 | .....=9|6 + (44 |
|00002140| 2a 20 28 68 65 69 67 68 | 74 25 20 2b 20 31 29 29 |* (heigh|t% + 1))|
|00002150| 0d 04 b0 28 dd 20 f2 6d | 65 6e 75 5f 74 69 63 6b |...(. .m|enu_tick|
|00002160| 5f 74 6f 67 67 6c 65 28 | 6d 65 6e 75 25 2c 70 6f |_toggle(|menu%,po|
|00002170| 73 69 74 69 6f 6e 25 29 | 0d 04 ba 4f 20 20 6d 65 |sition%)|...O me|
|00002180| 6e 75 25 3f 28 32 38 20 | 2b 20 32 34 20 2a 20 28 |nu%?(28 |+ 24 * (|
|00002190| 70 6f 73 69 74 69 6f 6e | 25 20 2d 20 31 29 29 20 |position|% - 1)) |
|000021a0| 3d 20 6d 65 6e 75 25 3f | 28 32 38 20 2b 20 32 34 |= menu%?|(28 + 24|
|000021b0| 20 2a 20 28 70 6f 73 69 | 74 69 6f 6e 25 20 2d 20 | * (posi|tion% - |
|000021c0| 31 29 29 20 82 20 31 0d | 04 c4 05 e1 0d 05 14 2d |1)) . 1.|.......-|
|000021d0| dd 20 f2 73 65 74 5f 6d | 65 6e 75 5f 74 69 63 6b |. .set_m|enu_tick|
|000021e0| 28 6d 65 6e 75 25 2c 70 | 6f 73 69 74 69 6f 6e 25 |(menu%,p|osition%|
|000021f0| 2c 74 69 63 6b 65 64 25 | 29 0d 05 1e 11 20 20 e7 |,ticked%|).... .|
|00002200| 20 74 69 63 6b 65 64 25 | 20 8c 0d 05 28 51 20 20 | ticked%| ...(Q |
|00002210| 20 20 6d 65 6e 75 25 3f | 28 32 38 20 2b 20 32 34 | menu%?|(28 + 24|
|00002220| 20 2a 20 28 70 6f 73 69 | 74 69 6f 6e 25 20 2d 20 | * (posi|tion% - |
|00002230| 31 29 29 20 3d 20 6d 65 | 6e 75 25 3f 28 32 38 20 |1)) = me|nu%?(28 |
|00002240| 2b 20 32 34 20 2a 20 28 | 70 6f 73 69 74 69 6f 6e |+ 24 * (|position|
|00002250| 25 20 2d 20 31 29 29 20 | 84 20 31 0d 05 32 07 20 |% - 1)) |. 1..2. |
|00002260| 20 cc 0d 05 3c 59 20 20 | 20 20 6d 65 6e 75 25 3f | ...<Y | menu%?|
|00002270| 28 32 38 20 2b 20 32 34 | 20 2a 20 28 70 6f 73 69 |(28 + 24| * (posi|
|00002280| 74 69 6f 6e 25 20 2d 20 | 31 29 29 20 3d 20 6d 65 |tion% - |1)) = me|
|00002290| 6e 75 25 3f 28 32 38 20 | 2b 20 32 34 20 2a 20 28 |nu%?(28 |+ 24 * (|
|000022a0| 70 6f 73 69 74 69 6f 6e | 25 20 2d 20 31 29 29 20 |position|% - 1)) |
|000022b0| 80 20 25 31 31 31 31 31 | 31 31 30 0d 05 46 07 20 |. %11111|110..F. |
|000022c0| 20 cd 0d 05 50 05 e1 0d | 05 78 23 dd 20 a4 6d 65 | ...P...|.x#. .me|
|000022d0| 6e 75 5f 74 69 63 6b 65 | 64 28 6d 65 6e 75 25 2c |nu_ticke|d(menu%,|
|000022e0| 70 6f 73 69 74 69 6f 6e | 25 29 0d 05 82 0f 20 20 |position|%).... |
|000022f0| ea 20 72 65 73 75 6c 74 | 25 0d 05 8c 35 20 20 e7 |. result|%...5 .|
|00002300| 20 28 6d 65 6e 75 25 3f | 28 32 38 20 2b 20 32 34 | (menu%?|(28 + 24|
|00002310| 20 2a 20 28 70 6f 73 69 | 74 69 6f 6e 25 20 2d 20 | * (posi|tion% - |
|00002320| 31 29 29 20 80 20 31 29 | 20 3e 20 30 20 8c 0d 05 |1)) . 1)| > 0 ...|
|00002330| 96 13 20 20 20 20 72 65 | 73 75 6c 74 25 20 3d 20 |.. re|sult% = |
|00002340| b9 0d 05 a0 07 20 20 cc | 0d 05 aa 13 20 20 20 20 |..... .|.... |
|00002350| 72 65 73 75 6c 74 25 20 | 3d 20 a3 0d 05 b4 07 20 |result% |= ..... |
|00002360| 20 cd 0d 05 be 0c 3d 72 | 65 73 75 6c 74 25 0d 05 | .....=r|esult%..|
|00002370| dc 15 dd 20 a4 61 64 6a | 75 73 74 5f 70 72 65 73 |... .adj|ust_pres|
|00002380| 73 65 64 0d 05 e6 2b 20 | 20 c8 99 20 22 57 69 6d |sed...+ | .. "Wim|
|00002390| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|000023a0| 22 2c 2c 64 61 74 61 5f | 62 6c 6f 63 6b 25 0d 05 |",,data_|block%..|
|000023b0| f0 19 3d 20 28 64 61 74 | 61 5f 62 6c 6f 63 6b 25 |..= (dat|a_block%|
|000023c0| 21 38 20 80 20 31 29 0d | 06 40 21 dd 20 a4 66 69 |!8 . 1).|.@!. .fi|
|000023d0| 65 6c 64 28 f8 20 6d 65 | 6e 75 24 2c 20 73 65 70 |eld(. me|nu$, sep|
|000023e0| 61 72 61 74 6f 72 24 29 | 0d 06 4a 0f 20 20 ea 20 |arator$)|..J. . |
|000023f0| 72 65 73 75 6c 74 24 0d | 06 54 39 20 20 72 65 73 |result$.|.T9 res|
|00002400| 75 6c 74 24 20 3d 20 c0 | 6d 65 6e 75 24 2c a7 6d |ult$ = .|menu$,.m|
|00002410| 65 6e 75 24 2b 73 65 70 | 61 72 61 74 6f 72 24 2c |enu$+sep|arator$,|
|00002420| 73 65 70 61 72 61 74 6f | 72 24 29 20 2d 20 31 29 |separato|r$) - 1)|
|00002430| 0d 06 5e 31 20 20 6d 65 | 6e 75 24 20 20 20 3d 20 |..^1 me|nu$ = |
|00002440| c2 6d 65 6e 75 24 2c a9 | 28 6d 65 6e 75 24 29 20 |.menu$,.|(menu$) |
|00002450| 2d 20 a9 28 72 65 73 75 | 6c 74 24 29 20 2d 20 31 |- .(resu|lt$) - 1|
|00002460| 29 0d 06 68 0c 3d 72 65 | 73 75 6c 74 24 0d ff |)..h.=re|sult$.. |
+--------+-------------------------+-------------------------+--------+--------+